REM SafeOPL by Richard Smedley <rsmedley@cix.co.uk>

REM Use the <main> procedure below as a template for each
REM procedure that you want to be protected against RevTran
REM in your finished program. For each procedure that you
REM write, change the <proc1::> label to proc2::, proc3:: etc.

REM When your program is finished, use the supplied SafeOPL
REM program to modify your translated OPO/OPA file, to protect
REM it against being decompiled using RevTran.

PROC main:
	REM <declare variables here using LOCAL and GLOBAL>
	GOTO proc1::
	PRINT "**REVTRAN PROTECTED**"
	proc1::
	REM <write the rest of the proc here!>
ENDP